home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / BoxKite.dxr / Internal_71_foundation hot 2.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  744 b   |  27 lines
  1. property spriteNum
  2. global equal, hotcard, foundation
  3.  
  4. on beginSprite
  5.   sprite(spriteNum).blend = 0
  6. end
  7.  
  8. on mouseEnter
  9.   if the clickOn <> 0 then
  10.     if sprite(the clickOn).moveableSprite = 1 then
  11.       if (the clickOn >= 34) and (the clickOn <= 45) then
  12.         if sprite(spriteNum - 8).visible = 1 then
  13.           if (getlist(the clickOn)[getlist(the clickOn).count].rankvalue = (foundation[makesymbol(spriteNum - 8)].getlastcard().rankvalue - 1)) and (getlist(the clickOn)[getlist(the clickOn).count].suit = foundation[makesymbol(spriteNum - 8)].getlastcard().suit) then
  14.             equal = 1
  15.             hotcard = spriteNum - 8
  16.           end if
  17.         end if
  18.       end if
  19.     end if
  20.   end if
  21. end
  22.  
  23. on mouseLeave
  24.   equal = 0
  25.   hotcard = 0
  26. end
  27.